object FormVarGrab: TFormVarGrab
  Left = 230
  Top = 152
  ActiveControl = ListUser
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Variable Grabber'
  ClientHeight = 439
  ClientWidth = 630
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = [fsBold]
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000888880000000000000000000000
    0000444448800000000000000000000000004FFFF48000000000000000000000
    000004FFF48000000000000000000000000004FFF48000000000000000000000
    000004FFF48800000000000000000000000004FFFF4800000000000000000000
    0000004FFF48000000000000000000000000004FFF4880000000000000000000
    0000004FFFF48888800000000000000000000004FFF444448880000000000000
    00000004FFFFFFFF448888000000000000000004FFFFFFFFFF44488000000000
    000000004FFF4444FFFFF48880000000000000004FFF4CCC44FFFF4488000000
    000000004FFF4EEECC4FFFFF48800000000000004FFFF4FFEEC44FFFF4800000
    0000000004FFF480FFECC4FFF48800000000000004FFF48800FEC4FFFF480FF0
    0000000004FFFF48000FEC4FFF4800EFF000000004FFFF48000FEC4FFF48000E
    EFFFF000004444400FFFEC4FFF48000CCCEEEEFFFFFFFFFFFEEEC4FFFF480000
    44CCCCCEEEEEEEEEECCC4FFFFF4000000444444CCCCCCCCCC444FFFFF4000000
    004FFFF4444444444FFFFFFF4000000000044FFFFFFFFFFFFFFFFF4400000000
    00000444FFFFFFFFFFF444000000000000000000444444444440000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFF83FFFFFF01FFFFFF01FFFFFF81FFFFFF81FFFFFF80FFFFFF80FFFFFFC0
    FFFFFFC07FFFFFC007FFFFE001FFFFE0003FFFE0001FFFF00007FFF00003FFF0
    0001FFF00001FFF81000FFF80C009FF80E00C7F80E00E07C1800E0000000F000
    0001F8000003FC000007FE00000FFF80003FFFF001FFFFFFFFFFFFFFFFFF}
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 14
  object Bevel1: TBevel
    Left = 8
    Top = 372
    Width = 613
    Height = 25
    Shape = bsFrame
  end
  object Label2: TLabel
    Left = 8
    Top = 5
    Width = 145
    Height = 14
    AutoSize = False
    Caption = '&User-Defined Variables'
    FocusControl = ListUser
  end
  object Label1: TLabel
    Left = 164
    Top = 5
    Width = 145
    Height = 14
    AutoSize = False
    Caption = '&System Variables'
    FocusControl = ListSystem
  end
  object Label5: TLabel
    Left = 476
    Top = 5
    Width = 145
    Height = 14
    AutoSize = False
    Caption = 'System Re&ferences'
    FocusControl = ListReference
  end
  object Label4: TLabel
    Left = 320
    Top = 5
    Width = 145
    Height = 14
    AutoSize = False
    Caption = 'System &Evaluators'
    FocusControl = ListEvaluators
  end
  object Label4a: TLabel
    Left = 320
    Top = 21
    Width = 145
    Height = 14
    AutoSize = False
    Caption = '(write-to only)'
    FocusControl = ListEvaluators
  end
  object Label6: TLabel
    Left = 164
    Top = 21
    Width = 145
    Height = 14
    AutoSize = False
    Caption = '(reference && write-to)'
    FocusControl = ListSystem
  end
  object Label7: TLabel
    Left = 8
    Top = 21
    Width = 145
    Height = 14
    AutoSize = False
    Caption = '(reference && write-to)'
    FocusControl = ListUser
  end
  object Label5a: TLabel
    Left = 476
    Top = 21
    Width = 145
    Height = 14
    AutoSize = False
    Caption = '(reference only)'
    FocusControl = ListReference
  end
  object a1: TImage
    Left = 16
    Top = 378
    Width = 14
    Height = 14
    Picture.Data = {
      07544269746D6170E6000000424DE60000000000000076000000280000000E00
      00000E0000000100040000000000700000000000000000000000100000001000
      000000000000000080000080000000808000800000008000800080800000C0C0
      C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF0077777777777777007777CCCCCCC77700777CEEEEEEEC770077CECCCCCCCE
      C7007CECCEECEECC77007CECECCEECEC77007CECECCCECCEC7007CECECCCECCE
      C7007CECCECCEECEC70077CECCEECECEC70077CEECCCCCEC7700777CCEEEEEC7
      770077777CCCCC7777007777777777777700}
    Transparent = True
    Visible = False
  end
  object a2: TImage
    Left = 184
    Top = 410
    Width = 14
    Height = 14
    Picture.Data = {
      07544269746D6170E6000000424DE60000000000000076000000280000000E00
      00000E0000000100040000000000700000000000000000000000100000001000
      000000000000000080000080000000808000800000008000800080800000C0C0
      C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF00777777777777770077772222222777007772AAAAAAA27700772A2222222A
      270072A22AA2AA22770072A2A22AA2A2770072A2A222A22A270072A2A222A22A
      270072A22A22AA2A2700772A22AA2A2A2700772AA22222A2770077722AAAAA27
      770077777222227777007777777777777700}
    Transparent = True
    Visible = False
  end
  object a3: TImage
    Left = 200
    Top = 410
    Width = 14
    Height = 14
    Picture.Data = {
      07544269746D6170E6000000424DE60000000000000076000000280000000E00
      00000E0000000100040000000000700000000000000000000000100000001000
      000000000000000080000080000000808000800000008000800080800000C0C0
      C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF00777777777777770077775555555777007775DDDDDDD57700775D5555555D
      570075D55DD5DD55770075D5D55DD5D5770075D5D555D55D570075D5D555D55D
      570075D55D55DD5D5700775D55DD5D5D5700775DD55555D5770077755DDDDD57
      770077777555557777007777777777777700}
    Transparent = True
    Visible = False
  end
  object a6: TImage
    Left = 232
    Top = 410
    Width = 14
    Height = 14
    Picture.Data = {
      07544269746D6170E6000000424DE60000000000000076000000280000000E00
      00000E0000000100040000000000700000000000000000000000100000001000
      000000000000000080000080000000808000800000008000800080800000C0C0
      C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF00777777777777770077771111111777007771999999917700771911111119
      1700719119919911770071919119919177007191911191191700719191119119
      1700719119119919170077191199191917007719911111917700777119999917
      770077777111117777007777777777777700}
    Transparent = True
    Visible = False
  end
  object a5: TImage
    Left = 216
    Top = 410
    Width = 14
    Height = 14
    Picture.Data = {
      07544269746D6170E6000000424DE60000000000000076000000280000000E00
      00000E0000000100040000000000700000000000000000000000100000001000
      000000000000000080000080000000808000800000008000800080800000C0C0
      C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF00777777777777770077776666666777007776EEEEEEE67700776E6666666E
      670076E66EE6EE66770076E6E66EE6E6770076E6E666E66E670076E6E666E66E
      670076E66E66EE6E6700776E66EE6E6E6700776EE66666E6770077766EEEEE67
      770077777666667777007777777777777700}
    Transparent = True
    Visible = False
  end
  object LabelValue: TLabel
    Left = 31
    Top = 377
    Width = 585
    Height = 17
    AutoSize = False
    Caption = 'Click on any reference variable to see the current value'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object BtnOK1: TBitBtn
    Left = 8
    Top = 340
    Width = 145
    Height = 25
    Caption = '&Grab'
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      040000000000800000000000000000000000100000001000000000000000426B
      00004A7300004A7B0000527F00005A8C00005A9400005AA25200818FF600BDCB
      EE00BBD2E300D2D8E200C9E4F200DEDEDE00E1E4E900ECF5F800888888888888
      044388888888888066658888888880004321888888880EE044448800000000EE
      056680999999990FF0660C9009999990FE068008099999990FE088880CCC9999
      90F08000CCCC999990080CCCC0CCCCC9088880000CC0CCCC0888880CCC0CCCC0
      88888880000C0C08888888880CCC008888888888800088888888}
    ParentShowHint = False
    ShowHint = False
    Spacing = 8
    TabOrder = 4
    OnClick = BtnOK1Click
  end
  object BtnCancel: TBitBtn
    Left = 476
    Top = 405
    Width = 145
    Height = 25
    Cancel = True
    Caption = '&Cancel'
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      55555555555555555555555555555555555555FFFFF5555FFFFF550000555500
      00555777775F5577777F501111055011110557F5FF75F755FF7F501991100119
      910557F77FF77557757F5011991111991105575F77FF55775575550119911991
      10555575F77FF7755755555011999911055555575F7777557555555501199110
      5555555575577FF75F5555501199991105555557557777FF75F5550119911991
      105555755775577FF75F501199111199110557F57755FF77FF7F501991100119
      910557F7755775F7757F501111055011110557FFFF75575FFF7F550000555500
      0055577777555577777555555555555555555555555555555555}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = False
    TabOrder = 8
    OnClick = BtnCancelClick
  end
  object ListUser: TListBox
    Tag = 1
    Left = 8
    Top = 40
    Width = 145
    Height = 300
    Style = lbOwnerDrawFixed
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 14
    ParentFont = False
    TabOrder = 0
    OnClick = ListUserClick
    OnDblClick = BtnOK1Click
    OnDrawItem = ListUserDrawItem
    OnKeyPress = ListUserKeyPress
  end
  object ListSystem: TListBox
    Tag = 2
    Left = 164
    Top = 40
    Width = 145
    Height = 300
    Style = lbOwnerDrawFixed
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 14
    ParentFont = False
    TabOrder = 1
    OnClick = ListUserClick
    OnDblClick = BtnOK2Click
    OnDrawItem = ListUserDrawItem
    OnKeyPress = ListUserKeyPress
  end
  object ListEvaluators: TListBox
    Tag = 3
    Left = 320
    Top = 40
    Width = 145
    Height = 300
    Style = lbOwnerDrawFixed
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 14
    ParentFont = False
    TabOrder = 2
    OnClick = ListUserClick
    OnDblClick = BtnOK3Click
    OnDrawItem = ListUserDrawItem
    OnKeyPress = ListUserKeyPress
  end
  object ListReference: TListBox
    Tag = 4
    Left = 476
    Top = 40
    Width = 145
    Height = 300
    Style = lbOwnerDrawFixed
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 14
    ParentFont = False
    TabOrder = 3
    OnClick = ListUserClick
    OnDblClick = BtnOK4Click
    OnDrawItem = ListUserDrawItem
    OnKeyPress = ListUserKeyPress
  end
  object BtnOK2: TBitBtn
    Left = 164
    Top = 340
    Width = 145
    Height = 25
    Caption = 'G&rab'
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      040000000000800000000000000000000000100000001000000000000000426B
      00004A7300004A7B0000527F00005A8C00005A9400005AA25200818FF600BDCB
      EE00BBD2E300D2D8E200C9E4F200DEDEDE00E1E4E900ECF5F800888888888888
      044388888888888066658888888880004321888888880EE044448800000000EE
      056680999999990FF0660C9009999990FE068008099999990FE088880CCC9999
      90F08000CCCC999990080CCCC0CCCCC9088880000CC0CCCC0888880CCC0CCCC0
      88888880000C0C08888888880CCC008888888888800088888888}
    ParentShowHint = False
    ShowHint = False
    Spacing = 8
    TabOrder = 5
    OnClick = BtnOK2Click
  end
  object BtnOK3: TBitBtn
    Left = 320
    Top = 340
    Width = 145
    Height = 25
    Caption = 'Gr&ab'
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      040000000000800000000000000000000000100000001000000000000000426B
      00004A7300004A7B0000527F00005A8C00005A9400005AA25200818FF600BDCB
      EE00BBD2E300D2D8E200C9E4F200DEDEDE00E1E4E900ECF5F800888888888888
      044388888888888066658888888880004321888888880EE044448800000000EE
      056680999999990FF0660C9009999990FE068008099999990FE088880CCC9999
      90F08000CCCC999990080CCCC0CCCCC9088880000CC0CCCC0888880CCC0CCCC0
      88888880000C0C08888888880CCC008888888888800088888888}
    ParentShowHint = False
    ShowHint = False
    Spacing = 8
    TabOrder = 6
    OnClick = BtnOK3Click
  end
  object BtnOK4: TBitBtn
    Left = 476
    Top = 340
    Width = 145
    Height = 25
    Caption = 'Gra&b'
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      040000000000800000000000000000000000100000001000000000000000426B
      00004A7300004A7B0000527F00005A8C00005A9400005AA25200818FF600BDCB
      EE00BBD2E300D2D8E200C9E4F200DEDEDE00E1E4E900ECF5F800888888888888
      044388888888888066658888888880004321888888880EE044448800000000EE
      056680999999990FF0660C9009999990FE068008099999990FE088880CCC9999
      90F08000CCCC999990080CCCC0CCCCC9088880000CC0CCCC0888880CCC0CCCC0
      88888880000C0C08888888880CCC008888888888800088888888}
    ParentShowHint = False
    ShowHint = False
    Spacing = 8
    TabOrder = 7
    OnClick = BtnOK4Click
  end
  object BtnVars: TBitBtn
    Left = 8
    Top = 405
    Width = 145
    Height = 25
    Hint = 'Develop variables'
    Caption = '&Develop &Variables'
    Glyph.Data = {
      F6000000424DF60000000000000076000000280000000C000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00778888888888
      0000700000000008000070777777770800007070000007080000707CCCCCCC08
      000070CEEEEEEEC800007CECCCCCCCEC0000CECCEECEECC80000CECECCEECEC8
      0000CECECFCECCEC0000CECEC0CECCEC0000CECCECCEECEC00007CECCEECECEC
      00007CEECCCCCEC7000077CCEEEEEC7700007777CCCCC7770000}
    TabOrder = 9
    OnClick = BtnVarsClick
  end
end
